home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Reference Guide / C-C++ Interactive Reference Guide.iso / c_ref / csource4 / 223_01 / rename.c < prev    next >
Encoding:
C/C++ Source or Header  |  1979-12-31  |  512 b   |  21 lines
  1. /*    
  2. ** rename(old,new) char *old, *new;    by F.A.Scacchitti  9/11/84
  3. */
  4.  
  5. #define NOCCARGC
  6. #include <stdio.h>
  7.  
  8.    static int fcbloc;
  9.  
  10. rename(old,new) char *old, *new; {
  11.  
  12.    if ((fcbloc = grabio()) == NULL) return(ERR);
  13.    fcb(fcbloc, old);
  14.    fcb(fcbloc + 16, new);
  15.    freeio(fcbloc);
  16.  
  17.    if(bdos(23,fcbloc) >= 0) return(NULL);
  18.    return(ERR);
  19. }
  20.  
  21.